home *** CD-ROM | disk | FTP | other *** search
/ AMIGA-CD 2 / Amiga-CD - Volume 2.iso / ungepackte_daten / 1994 / 8 / 05 / term-4.0-source.lha / SoundPanel.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-07-03  |  9.6 KB  |  410 lines
  1. /*
  2. **    SoundPanel.c
  3. **
  4. **    Editing panel for sound configuration
  5. **
  6. **    Copyright © 1990-1994 by Olaf `Olsen' Barthel
  7. **        All Rights Reserved
  8. */
  9.  
  10. #include "termGlobal.h"
  11.  
  12. enum    {    GAD_BELL=1,GAD_CONNECT,GAD_DISCONNECT,GAD_GOOD_TRANSFER,
  13.         GAD_BAD_TRANSFER,GAD_RING,GAD_VOICE,GAD_PRELOAD,GAD_VOLUME,
  14.         GAD_USE,GAD_LOAD,GAD_SAVE,GAD_CANCEL
  15.     };
  16.  
  17. BYTE __regargs
  18. SoundPanel(struct SoundConfig *Config)
  19. {
  20.     struct LayoutHandle *Handle;
  21.  
  22.     STATIC struct SoundConfig __far BackupConfig;
  23.  
  24.     CopyMem(Config,&BackupConfig,sizeof(struct SoundConfig));
  25.  
  26.     if(Handle = LT_CreateHandleTags(Window -> WScreen,
  27.         LH_LocaleHook,    &LocaleHook,
  28.     TAG_DONE))
  29.     {
  30.         struct Window *Window;
  31.  
  32.         LT_New(Handle,
  33.             LA_Type,    VERTICAL_KIND,
  34.         TAG_DONE);
  35.         {
  36.             LT_New(Handle,
  37.                 LA_Type,    VERTICAL_KIND,
  38.                 LA_LabelID,    MSG_V36_0182,
  39.             TAG_DONE);
  40.             {
  41.                 LT_New(Handle,
  42.                     LA_Type,    VERTICAL_KIND,
  43.                 TAG_DONE);
  44.                 {
  45.                     LT_New(Handle,
  46.                         LA_Type,    STRING_KIND,
  47.                         LA_LabelID,    MSG_SOUNDPANEL_BELL_GAD,
  48.                         LA_STRPTR,    Config -> BellFile,
  49.                         LA_Chars,    30,
  50.                         LA_ID,        GAD_BELL,
  51.                         LAST_Picker,    TRUE,
  52.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  53.                     TAG_DONE);
  54.  
  55.                     LT_New(Handle,
  56.                         LA_Type,    STRING_KIND,
  57.                         LA_LabelID,    MSG_SOUNDPANEL_CONNECT_GAD,
  58.                         LA_STRPTR,    Config -> ConnectFile,
  59.                         LA_ID,        GAD_CONNECT,
  60.                         LAST_Picker,    TRUE,
  61.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  62.                     TAG_DONE);
  63.  
  64.                     LT_New(Handle,
  65.                         LA_Type,    STRING_KIND,
  66.                         LA_LabelID,    MSG_SOUNDPANEL_DISCONNECT_GAD,
  67.                         LA_STRPTR,    Config -> DisconnectFile,
  68.                         LA_ID,        GAD_DISCONNECT,
  69.                         LAST_Picker,    TRUE,
  70.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  71.                     TAG_DONE);
  72.  
  73.                     LT_New(Handle,
  74.                         LA_Type,    STRING_KIND,
  75.                         LA_LabelID,    MSG_SOUNDPANEL_GOOD_TRANSFER_GAD,
  76.                         LA_STRPTR,    Config -> GoodTransferFile,
  77.                         LA_ID,        GAD_GOOD_TRANSFER,
  78.                         LAST_Picker,    TRUE,
  79.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  80.                     TAG_DONE);
  81.  
  82.                     LT_New(Handle,
  83.                         LA_Type,    STRING_KIND,
  84.                         LA_LabelID,    MSG_SOUNDPANEL_BAD_TRANSFER_GAD,
  85.                         LA_STRPTR,    Config -> BadTransferFile,
  86.                         LA_ID,        GAD_BAD_TRANSFER,
  87.                         LAST_Picker,    TRUE,
  88.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  89.                     TAG_DONE);
  90.  
  91.                     LT_New(Handle,
  92.                         LA_Type,    STRING_KIND,
  93.                         LA_LabelID,    MSG_SOUNDPANEL_RING_GAD,
  94.                         LA_STRPTR,    Config -> RingFile,
  95.                         LA_ID,        GAD_RING,
  96.                         LAST_Picker,    TRUE,
  97.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  98.                     TAG_DONE);
  99.  
  100.                     LT_New(Handle,
  101.                         LA_Type,    STRING_KIND,
  102.                         LA_LabelID,    MSG_SOUNDPANEL_VOICE_GAD,
  103.                         LA_STRPTR,    Config -> VoiceFile,
  104.                         LA_ID,        GAD_VOICE,
  105.                         LAST_Picker,    TRUE,
  106.                         GTST_MaxChars,    MAX_FILENAME_LENGTH - 1,
  107.                     TAG_DONE);
  108.  
  109.                     LT_EndGroup(Handle);
  110.                 }
  111.  
  112.                 LT_New(Handle,
  113.                     LA_Type,    XBAR_KIND,
  114.                 TAG_DONE);
  115.  
  116.                 LT_New(Handle,
  117.                     LA_Type,    VERTICAL_KIND,
  118.                 TAG_DONE);
  119.                 {
  120.                     LT_New(Handle,
  121.                         LA_Type,        SLIDER_KIND,
  122.                         LA_LabelID,        MSG_SOUNDPANEL_VOLUME_GAD,
  123.                         LA_BYTE,        &Config -> Volume,
  124.                         LA_ID,            GAD_VOLUME,
  125.                         LA_Chars,        10,
  126.                         GTSL_Min,        0,
  127.                         GTSL_Max,        100,
  128.                         GTSL_LevelFormat,    "%ld%%",
  129.                     TAG_DONE);
  130.  
  131.                     LT_New(Handle,
  132.                         LA_Type,    CHECKBOX_KIND,
  133.                         LA_LabelID,    MSG_SOUNDPANEL_PRELOAD_GAD,
  134.                         LA_BYTE,    &Config -> Preload,
  135.                         LA_ID,        GAD_PRELOAD,
  136.                     TAG_DONE);
  137.  
  138.                     LT_EndGroup(Handle);
  139.                 }
  140.  
  141.                 LT_EndGroup(Handle);
  142.             }
  143.  
  144.             LT_New(Handle,
  145.                 LA_Type,VERTICAL_KIND,
  146.             TAG_DONE);
  147.             {
  148.                 LT_New(Handle,
  149.                     LA_Type,    XBAR_KIND,
  150.                     LAXB_FullSize,    TRUE,
  151.                 TAG_DONE);
  152.  
  153.                 LT_EndGroup(Handle);
  154.             }
  155.  
  156.             LT_New(Handle,LA_Type,HORIZONTAL_KIND,
  157.                 LAGR_SameSize,    TRUE,
  158.                 LAGR_Spread,    TRUE,
  159.             TAG_DONE);
  160.             {
  161.                 LT_New(Handle,
  162.                     LA_Type,    BUTTON_KIND,
  163.                     LA_LabelID,    MSG_GLOBAL_USE_GAD,
  164.                     LA_ID,        GAD_USE,
  165.                     LABT_ReturnKey,    TRUE,
  166.                     LABT_ExtraFat,    TRUE,
  167.                 TAG_DONE);
  168.  
  169.                 LT_New(Handle,
  170.                     LA_Type,    BUTTON_KIND,
  171.                     LA_LabelID,    MSG_GLOBAL_LOAD_GAD,
  172.                     LA_ID,        GAD_LOAD,
  173.                     LABT_ExtraFat,    TRUE,
  174.                 TAG_DONE);
  175.  
  176.                 LT_New(Handle,
  177.                     LA_Type,    BUTTON_KIND,
  178.                     LA_LabelID,    MSG_GLOBAL_SAVE_GAD,
  179.                     LA_ID,        GAD_SAVE,
  180.                     LABT_ExtraFat,    TRUE,
  181.                 TAG_DONE);
  182.  
  183.                 LT_New(Handle,
  184.                     LA_Type,    BUTTON_KIND,
  185.                     LA_LabelID,    MSG_GLOBAL_CANCEL_GAD,
  186.                     LA_ID,        GAD_CANCEL,
  187.                     LABT_EscKey,    TRUE,
  188.                     LABT_ExtraFat,    TRUE,
  189.                 TAG_DONE);
  190.  
  191.                 LT_EndGroup(Handle);
  192.             }
  193.  
  194.             LT_EndGroup(Handle);
  195.         }
  196.  
  197.         if(Window = LT_Layout(Handle,LocaleString(MSG_SOUNDPANEL_SOUND_PREFERENCES_TXT),NULL,0,0,IDCMP_CLOSEWINDOW,0,
  198.             LAWN_HelpHook,        &GuideHook,
  199.             WA_DepthGadget,        TRUE,
  200.             WA_CloseGadget,        TRUE,
  201.             WA_DragBar,        TRUE,
  202.             WA_RMBTrap,        TRUE,
  203.             WA_Activate,        TRUE,
  204.         TAG_DONE))
  205.         {
  206.             struct IntuiMessage    *Message;
  207.             BOOLEAN             Done = FALSE;
  208.             ULONG             MsgClass,
  209.                          MsgQualifier;
  210.             UWORD             MsgCode;
  211.             struct Gadget        *MsgGadget;
  212.             STRPTR             DummyChar;
  213.             UBYTE             DummyBuffer[MAX_FILENAME_LENGTH];
  214.             struct FileRequester    *FileRequest;
  215.  
  216.             GuideContext(CONTEXT_SOUND);
  217.  
  218.             PushWindow(Window);
  219.  
  220.             do
  221.             {
  222.                 if(Wait(PORTMASK(Window -> UserPort) | SIG_BREAK) & SIG_BREAK)
  223.                 {
  224.                     CopyMem(&BackupConfig,Config,sizeof(struct SoundConfig));
  225.  
  226.                     break;
  227.                 }
  228.  
  229.                 while(Message = (struct IntuiMessage *)GT_GetIMsg(Window -> UserPort))
  230.                 {
  231.                     MsgClass    = Message -> Class;
  232.                     MsgQualifier    = Message -> Qualifier;
  233.                     MsgCode        = Message -> Code;
  234.                     MsgGadget    = (struct Gadget *)Message -> IAddress;
  235.  
  236.                     GT_ReplyIMsg(Message);
  237.  
  238.                     LT_HandleInput(Handle,MsgQualifier,&MsgClass,&MsgCode,&MsgGadget);
  239.  
  240.                     if(MsgClass == IDCMP_CLOSEWINDOW)
  241.                     {
  242.                         CopyMem(&BackupConfig,Config,sizeof(struct SoundConfig));
  243.  
  244.                         Done = TRUE;
  245.                     }
  246.  
  247.                     if(MsgClass == IDCMP_GADGETUP)
  248.                     {
  249.                         switch(MsgGadget -> GadgetID)
  250.                         {
  251.                             case GAD_USE:
  252.  
  253.                                 SoundChanged = memcmp(&BackupConfig,Config,sizeof(struct SoundConfig));
  254.  
  255.                                 Done = TRUE;
  256.                                 break;
  257.  
  258.                             case GAD_CANCEL:
  259.  
  260.                                 CopyMem(&BackupConfig,Config,sizeof(struct SoundConfig));
  261.  
  262.                                 Done = TRUE;
  263.                                 break;
  264.  
  265.                             case GAD_LOAD:
  266.  
  267.                                 SplitFileName(LastSound,&DummyChar,DummyBuffer);
  268.  
  269.                                 LT_LockWindow(Window);
  270.  
  271.                                 if(FileRequest = GetFile(Window,LocaleString(MSG_SOUNDPANEL_LOAD_SOUNDS_TXT),DummyBuffer,FilePart(LastSound),DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_LOAD_TXT),TRUE))
  272.                                 {
  273.                                     if(!ReadIFFData(DummyBuffer,Config,sizeof(struct SoundConfig),ID_SOUN))
  274.                                         ShowError(Window,ERR_LOAD_ERROR,IoErr(),DummyBuffer);
  275.                                     else
  276.                                     {
  277.                                         SoundChanged = FALSE;
  278.  
  279.                                         strcpy(LastSound,DummyBuffer);
  280.  
  281.                                         LT_SetAttributes(Handle,GAD_BELL,
  282.                                             GTST_String,Config -> BellFile,
  283.                                         TAG_DONE);
  284.  
  285.                                         LT_SetAttributes(Handle,GAD_CONNECT,
  286.                                             GTST_String,Config -> ConnectFile,
  287.                                         TAG_DONE);
  288.  
  289.                                         LT_SetAttributes(Handle,GAD_DISCONNECT,
  290.                                             GTST_String,Config -> DisconnectFile,
  291.                                         TAG_DONE);
  292.  
  293.                                         LT_SetAttributes(Handle,GAD_GOOD_TRANSFER,
  294.                                             GTST_String,Config -> GoodTransferFile,
  295.                                         TAG_DONE);
  296.  
  297.                                         LT_SetAttributes(Handle,GAD_BAD_TRANSFER,
  298.                                             GTST_String,Config -> BadTransferFile,
  299.                                         TAG_DONE);
  300.  
  301.                                         LT_SetAttributes(Handle,GAD_RING,
  302.                                             GTST_String,Config -> RingFile,
  303.                                         TAG_DONE);
  304.  
  305.                                         LT_SetAttributes(Handle,GAD_VOICE,
  306.                                             GTST_String,Config -> VoiceFile,
  307.                                         TAG_DONE);
  308.  
  309.                                         LT_SetAttributes(Handle,GAD_PRELOAD,
  310.                                             GTCB_Checked,Config -> Preload,
  311.                                         TAG_DONE);
  312.  
  313.                                         LT_SetAttributes(Handle,GAD_VOLUME,
  314.                                             GTSL_Level,Config -> Volume,
  315.                                         TAG_DONE);
  316.                                     }
  317.  
  318.                                     FreeAslRequest(FileRequest);
  319.                                 }
  320.  
  321.                                 LT_UnlockWindow(Window);
  322.  
  323.                                 break;
  324.  
  325.                             case GAD_SAVE:
  326.  
  327.                                 SplitFileName(LastSound,&DummyChar,DummyBuffer);
  328.  
  329.                                 LT_LockWindow(Window);
  330.  
  331.                                 if(FileRequest = GetFile(Window,LocaleString(MSG_SOUNDPANEL_SAVE_SOUNDS_TXT),DummyBuffer,FilePart(LastSound),DummyBuffer,"#?.prefs",TRUE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SAVE_TXT),TRUE))
  332.                                 {
  333.                                     if(!WriteIFFData(DummyBuffer,Config,sizeof(struct SoundConfig),ID_SOUN))
  334.                                         ShowError(Window,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
  335.                                     else
  336.                                     {
  337.                                         strcpy(LastSound,DummyBuffer);
  338.  
  339.                                         SoundChanged = FALSE;
  340.                                     }
  341.  
  342.                                     FreeAslRequest(FileRequest);
  343.                                 }
  344.  
  345.                                 LT_UnlockWindow(Window);
  346.  
  347.                                 break;
  348.  
  349.                             default:
  350.  
  351.                                 if(MsgGadget -> GadgetID >= GAD_BELL && MsgGadget -> GadgetID <= GAD_VOICE)
  352.                                 {
  353.                                     if(MsgCode == '\r' && Config -> Volume)
  354.                                     {
  355.                                         STRPTR Name;
  356.  
  357.                                         LT_LockWindow(Window);
  358.  
  359.                                         Name = (STRPTR)LT_GetAttributes(Handle,MsgGadget -> GadgetID,TAG_DONE);
  360.  
  361.                                         if(Name[0])
  362.                                         {
  363.                                             struct SoundInfo *SoundInfo;
  364.  
  365.                                             if(SoundInfo = LoadSound(Name,FALSE))
  366.                                             {
  367.                                                 PlaySound(SoundInfo);
  368.  
  369.                                                 FreeSound(SoundInfo);
  370.                                             }
  371.                                         }
  372.  
  373.                                         LT_UnlockWindow(Window);
  374.                                     }
  375.                                 }
  376.  
  377.                                 break;
  378.                         }
  379.                     }
  380.  
  381.                     if(MsgClass == IDCMP_IDCMPUPDATE && MsgGadget -> GadgetID >= GAD_BELL && MsgGadget -> GadgetID <= GAD_VOICE)
  382.                     {
  383.                         SplitFileName((STRPTR)LT_GetAttributes(Handle,MsgGadget -> GadgetID,TAG_DONE),&DummyChar,DummyBuffer);
  384.  
  385.                         LT_LockWindow(Window);
  386.  
  387.                         if(FileRequest = GetFile(Window,LocaleString(MSG_SOUNDPANEL_SELECT_BELL_TXT + MsgGadget -> GadgetID - GAD_BELL),DummyBuffer,DummyChar,DummyBuffer,NULL,FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SELECT_TXT),TRUE))
  388.                         {
  389.                             LT_SetAttributes(Handle,MsgGadget -> GadgetID,
  390.                                 GTST_String,DummyBuffer,
  391.                             TAG_DONE);
  392.  
  393.                             FreeAslRequest(FileRequest);
  394.                         }
  395.  
  396.                         LT_UnlockWindow(Window);
  397.                     }
  398.                 }
  399.             }
  400.             while(!Done);
  401.  
  402.             PopWindow();
  403.         }
  404.  
  405.         LT_DeleteHandle(Handle);
  406.     }
  407.  
  408.     return((BYTE)memcmp(&BackupConfig,Config,sizeof(struct SoundConfig)));
  409. }
  410.